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Editorial 


We have had a few complaints that the newsletter is very late 
this time. It must be remembered that this is a users newsletter 
and as such is reliant on articles sent in by users. If we don't 
get anything sent in we can’t print it. We usually suffer from a 
lack of entnusiasm during the summer months but have been 
holding this newsletter back in case anything came through. This 
issue will use up all the information.in our file so if you have 
any programmes or other interesting articles to send please get 
them into us so thet we can produce the next issue without to 
much delay. | 


The 9938 VDP 


The most interesting thing on the Cortex scene at the moment is 
the possibillity of adding a new updated graphics chip. The 
Yamahar 9938 is directly upwardly compatible with the 9929 as 
Fitted in the Cortex so it is possible to fit it inside and 
retain all the existing fetures as well as adding more. 


Maplin sell a kit that includes a 9938 VDP and printed circuit 
board as part of a framestore project they have. When made up 
the PCB can be fitted inside the cortex and wired to a 40 pin 
header plug in place of the original VDP. The new maplin PCB 
provides output as R.G.B. and sync feeds for use with an 
analogue R.G.B. monitor. 


The new VDP works as a direct replacement for the 9929 so the 
cortex will function without any software update. But as well as 
the graphics and 40 column text modes you are used to it also 
provides other modes of operation including :- | 


TEXT MODE 2 80 column text mode 

GRAPHICS MODE same as graphics 2, but with sprite mode 2 
GRAPHICS MODE pixel mapped 256 X 212 with 16 colours 
GRAPHICS MODE pixel mapped 512 X 212 with 4 colours 
GRAPHICS MODE pixel mapped 512 X 212 with 16 colours 
GRAPHICS MODE pixel mapped 256 X 212 with 256 colours 


“SOW EW 


Al the new graphics modes can use sprite mode 2 which allows 
more sprites and better colour control of them. Plus all the 
colours in the new VOP are programable via a colour pallette. 


Chris Young has written a set of software drivers that allow the 
use of all the new graphics modes with the new VDP either fitted 
in place of the old one or fitted seperately on the E.bus. 


Ted Serva has written the following guide to fitting the Maplin 
board inside the Cortex. 
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Hardware required ont 1 * V9938 KIT FROM MAPLIN | 


1 * 64 WAY A&C DIN 41612 CONNECTOR 


k 


1 * 40 PIN IC HEADER/IC SCKT 
1 * 14 PIN IP HEADER/IC SCKT 
RIBBON CABLE. 5" 


The following table is the connections required between the TMS9928/29 and 


the V9938 

40 PIN HEADER/IC SCKT | DIN 41612 A&C CONNECTOR 

PIN No . oe a PIN No 

GRNO 12------- Se ere ee ee ee Ree ee 32akc 
MODE AlS 13------------------ tween eae ee eos e Le 

CSW 14=---------------------- ee 19c 

CSR ]52-------------------------- 0-2 - nner 19a 

INT ]6--------------------- 2-2 one enn n nnn 23a 
LSB DO ]7-+--------~---------------- pith Concerns casi 30c 

Dl 1§+----------------------+--------------->- 30a 

D2 - 192 --------------------+------------------ 29c 

D3. - 20------~------------ 7-2 oe 29a 

D4 - 2) ~--- -------- = - nn 28c 

DS s- 22 ----- + = - - = ne 28a 

D6 23----------- ee errr i------------- Z1¢ 

“DF  @aecseetanessseesteeeess Seow pesemedeeeae 2 7 a 

RESET phases eee setae eee ease se ZING 


+SUPPLY Oo eeemwccee eect Sasa gueeuestinssees lake 


(1)Make up a cable with connections as above using a 40 pin header 
and DIN 41612 connector ee 


(2)Connect pin 4 and 6 on 14 pin header 


(3)Connect pin 8 and 9 on 14 pin header 


(4)Replace ICl on the V9958 board with the header that has just been made 
(5)Replace TMS9928/29 with 40 pin header and V9938 board 
NOTE The V9938 requires Al4 this is taken from the top track leading to 


pin 2 of the .™MS9909 sckt and connected to pin lla on the DIN41612 
connector 7 | 7 


A set of programs to initialise and use all the extra built in 
fFacilaties of the new VDP(V9938) is available on disc.Please state 

if the VDP is used on the £ BUS or as a replacement for the 1MS9928/29 
Disc is priced at TEN POUNDS all inclusive from : | 


C J YOUNG ,107 RINGWOOD ,GREAT HOLLAVNDS ,BRACKNALL ,BERKS ~ 
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1 REM Memory Mapper Setup utility A.R.C.Badcock QBASIC 
{ 

This utility allows the Memory Mapper 
registers to be loaded manually by the 
user. Each mapper register holds a 
value to which 4kbyte memory block in 
the bottom 64k of the memory map will 

be vectored. This only occurs after a 
CKON opcode switches the mapper on and 
ceases after a CKOF opcode switches the 
mapper off. 

This function allows any 4k page to be 

sSwitched-into the lower address area. 

This utility has certain safe-guards for 

the inexperienced. The user is prevented 

from setting the register controlling 
 QOOO0-OOFFF, and the registers from | 

QOCOOO-OEFFF as there is a danger of fouling. 
the operating system. Also the lowest page 
that can be vectored is OFOOO-OFFFF to avoid 
a tangle up in lower memory. 

However, the experienced programmer can 
always get around this in a program if 
needs be. This utility provides a direct 
method of setting the mapper up when 
expersMeae ng 


p) PRINT: PRINT"Memory Mapper Setup Utility v1.0" 
PRINT"“s22rrrcactsesaazatszssssssssssssea" 
PRINT: PRINT"By A. R. C.Badcock (c) 1988 ":PRINT. 


MAPLOC% = OF 100 {Mapper base address} 
10 errorflag’ = 0 °#£{clear error flag} 
GOSUB 100 {Input register value} 


15 IF errorflag% = 1 THEN 30 
20 GOSUB 200 {Input register data } 


30 INPUT"More ? "s;reply$ 
IF reply$ = "Y" OR reply$ ="y" THEN 10 
PRINT:PRINT"Mapper status":PRINT 
PRINT"Register : Mapper value":PRINT 


4O FOR OFFSETS = O0 TO 30 STEP 2 
MAPREG% = MAPLOC% + OFFSET% 
REGVAL%S = PEEK(MAPREG%) 
PRINT MAPREGH#; " = sREGVAL of 
NEXT OFFSET% 


50 PRINT 
PRINT" - Done - " 
PRINT 
STOP 
100 REM - Select aaaeor 
INPUT"Which mapper register to set (1 - 11 allowed) ? 
"+ MAPREGS 
IF MAPREGS < 1 OR MAPREG%S >11 THEN GOSUB 300 {Check valid 
register} : 
IF errorflag%s = 1 THEN RETURN 
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OF FSET% MAPREGS * 2 fallow for word increments} 
REGVAL% = PEEK(MAPLOC%+OFFSET%) . | 
PRINT "Current value of register is ";REGVAL%# 

RETURN | 


200 REM Set register value 


INPUT"Set mapper register value (15 - 255 allowed) 
"s MAPVALUE% 
IF MAPVALUE% < 15 | 
MAPVALUES =. MAPREG% {set default value} : 
PRINT "ERROR - value not allowed, default loaded " 


ENDIF 
PRINT oe 3 
POKE(MAPLOC%+OF FSET%) ,MAPVALUE % {load value in 
register } | 


—_... RETURN 
300 REM Error routine 


PRINT"This register not allowed - affects operating system 
area." o% a | 2 
errorflagw = l 
RETURN | 
999 END {End of program} 


. MAPPER SWITCH for MDEX by A.R.C.Badcock MDEX ASSEMBLER 


. This utility switches the mapper on. 


IDT “MAP-ON" 
COPY "1/3SYS$" 


RORG 

START CKON .issue mapper on command 
JSYS FINISH 

FINISH BYTE EXIT$,0O 
DATA 00000 


END START 


. MAPPER SWITCH by A.R.C.Badcock MDEX ASSEMBLER 


. This utility switches the mapper off. 


[DT "MAP-OFF" 
COPY "1/J3SYS$" 


RORG 

START CKOF .issue mapper off command 
JSYS FINISH ‘ 

FINISH BYTE EXIT$,0 
DATA 00000 


e 


END START 


{ COLOUR UTILITY FOR CORTEX SCREEN 
Copyright A.R.C.BADCOCK @1988 } 


{ 
This utility allows the Cortex screen 
colours - foreground & background - 
to be set by the user. 
} 
5 PRINT 
PRINT"CORTEX Screen colour setup utility v1.0" 
PRINT “ssesccasssssersssssssssssscsssssssasecs" 
PRINT 
PRINT"By A.R.C.Badcock - (c) 1988" 
PRINT | 


10 PRINT:PRINT"SET SCREEN COLOURS" 
PRINT | 


INPUT"FOREGROUND = "3FG% 
INPUT"BACKGROUND = "3;BG% 


COLOURCODE% = FG%*16+BG% {Calculate code value to write to 
VDP } 


REGIDENTS = 087 {Code to actuate colour load in 
VDP} | tal 

POKE(OF 121), COLOURCODE% {Write colours to VDP command 
register} | | . | | . 

POKE(OF121), REGIDENTS {Write actuate code to VDP 


command negister} 
PRINT:PRINT"OK":PRINT:PRINT 
STOP | 
END {of. program} 
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INSIDE CORTEX BASIC 


This article is intended to show haw BASIC programmes are stored in the CORTEX memory 
with descriptions of the various tables that are employed, The article will not cover 
programming in BASIC but will try to describe HOW the BASIC works. Some users who 
obviously have an in depth knowledge of the subject, judging from past newsletters will 
have to bear with me. However I hope the articles will be of use to the user group. I have | 
been investigating the BASIC in order to find a method of getting rid of so called Phantom — 
Variables. The aim of these articles is to combine my findings with ideas that have been 
presented in previous programmes and articles in the newsletters, I will try not to waste. 
too much space by repeating articles already published in the newsletters but will refer to 
some from time to time: | 


I will include some pragrammes to demonstrate the items covered and to enable people to 

have a look for themselves. The first programmes will be short and in BASIC to allow 
people to get the feel of what to look for before using the monitor and machine code 
routines. 


The subjects I intend to cover are: 


1, Introduction - Direct & Programme Modes. 
Z, Basic Pointers and how to find the tables, 
3. Keywords Functions and Tokens, 

4, Varables, Data, Numbers & Strings, 

= Summing Up 


1, Introduction, 


So! We have all written pragrammes in BASIC, but how much thought has been given as to 
what is happening, You type in your programme, edit the lines until it works and then run 
it. Type LIST and you can see your programme, Simple isn’t it? 


Actually the text you type and list is not what actually runs or what is stored in the 
computer’s memory. In fact there is always a programme running even when the computer 1s 
apparently idle, Even when users machine codes are not running, the Operating System 1s 
keeping things going, displaying screens to your TV/Monitor scanning the keyboard 
waiting for you to type etc. When the RETURN key is pressed the operating system 
branches to the EDITOR to process the data you have typed in, | 


If the data starts with a line number and the syntax is correct then the line is encoded 
and the BASIC tables are updated accordingly: No execution of commands is carried out 
(except for a few exceptions I shall mention later), If ther is NO line number and the 
syntax is correct then the editor branches to the routines to perform the commands that 
have been typed, I refer to this mode of operation as Direct Mode. The branches to the 
routines and encoding of BASIC use the tables shown in Newsletter & pages 11&12, 


When RUN is typed the editor passes control ta another routine the INTERPETER, This 
progamme scans through the basic tables and uses the tokens to execute the BASIC 
commands! Although’ the Interpreter and Editor both access the same routines (eg ‘PRINT” 
does the same thing whether typed directly or within a programme), the way in which these 
routines are invoked are different. More will be said of this in section 
3(Keywords,functions and tokens,), The action of the interpreter upon the tables is what | 
refer to as Programme Mode. 


When LIST is typed, control is passed to a machine code routine which decades the data 


stored in the BASIC tables back into lines of text which are then displayed. The EDIT key 
uses the same routine as LIST to decode a BASIC line and then passes control to the 
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Editor. The Editor and LIST both use a buffer located at EBO4H to hold the text data, The 
monitor does not use this buffer. If you type MON and then examine memory starting at 
EBO4 you will see the Ascii Codes for M ON terminated by a zero byte, This butter is 
immediately above the variable storage memory, | 


As always there are exceptions to the rule. Remember what I said about the editor 
feed line numbers, well try this: . 7 


Type NEW! to clear ce current programing 
Enter the line 


10 STE. 


Interesting 7 
Now type LIST. Nothing there! More about this in section 3! 


2, Basic Pointers and Tables. 


A BASIC programme in the Cortex is held in four tables. The first three af these are 

stored to tape or disk when the SAVE command is used. Because HASIC programmes can 
vary widely in size and in the numbers of variables used a system of pointers is used 
which hold the starting locations of each table, This system of using pointers is prefered 
to a fixed area of memory for each table for the following reasons, 


1, Memory use is more flexible, allowing space not taken up by programme lines to be used 
by variable tables and vice-versa. | 
2. With a fixed adressing method a shart programme would take up as much memory asa 


long programme. The pointer system leaves memory available for use by machine code -- 


_youtines, Also only. the area used by a BASIC programme needs to be stored and can be 
stored as a consetutive block of memory, leading to short LOADING times for smaller 
programmes, 

3,A Disadvantage is that the table contents have to be moved when new lines are pees In 
or old ones deleted. 
However, the advantages of 1 & 2 far outway the disadvantage of 3! 


The four BASIC tables are as follows:- 

1, Encoded form of the BASIC, each entry being one basic line. 

7, Line number table, containg line numbers and offsets to table 1. 

3, Variable Name aparee containing encoded forms of the variable names used in the 
programme. 

4, Variable address table, containing the addresses of assigned variebiess 


The pointers to the tables are at the following locations, shown in hex.format. 
EDO4 - Start of the Basic Code table. | 
-EFBA - Start of the Line No, table. 
EFBC - Start of the Variable Name table. 
EFBE —- Start of the Variable Address table, 
EFCO - Start of ae memory above BASIC, 


The NEW command if used witha ecrametes alters the address held at EDO4 (and also at 
EDO4), A value of 14H is added to the parameter so NEW 6000H puts the start of the Code 
table at 4014H, 


Fram now on I will use the @ symbol to mean the word held at an address, 
eg the address @EFBA is the start address of the Line Table. 
This nomenclature is similar to that used by assembly language: . 


THE BASIC CODE TABLE - (@EDO04 to GEFBA -Z 
Each byte in this tabie is a token for either a keyword, variable, function, delimiter, 
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operator or part of a number aor string. Basic lines are stored in sequence WITHOUT being ~ 

° preceded by a line number and each line is terminated by a zero byte. Tokens are 
effectively pointers to start addresses of cammands, functions and variable tables, 
meaning that BASIC lines can be interpreted very quickly. Each entry is of Valiente length 
depending on the length of the original basic line. | 


THE LINE NUMBER TABLE - (@EFBA to @EFBC - 

This Table contains line numbers in REVERSE a at every second word.The word 

Following a line number is the offset to the start of that line in the CODE TABLE, ie code 

for a line will start at @EDO4 + OFFSET, The table is used to locate the code when GOTO 
and GOSUB statements are encountered. The table | is also used when decoding lines for 

listing ar editing: 


THE VARIABLE NAME TABLE = -GEFEC to @QEFBE -2 

Contains encoded names of the variables. It is used in decoding lines fae display and 
editing. It is also used to examine or alter the value of a variable when a programme is 
halted, The first three words of this table are empty and the fourth contains 11D2 which is 
the encoded name for RND which is treated like a variable that can be reac from but not 
written to! | 


THE VARIABLE ADDRESS TABLE - @EFBE to @EFCO -2 

Once’a variable has been assigned either from the keyboard or from within a programme it ~ 
is given an address which is put into this table, The position in this table is equivalent to 
the position of its name in the previous table, The first four words of this table are zero 
(RND°does not wse an address held in this table). Unassigned variables also have a zero. 
entry. Dimensioned variables only have the address for index (Q) stored in the table, 
higher index addresses being calculated by the operating system, 


The variable addresses are themselves pointers to the data stored in a varable. Variables 
are created as they are defined and progressively move DOWNWARDS through memory. The 
variables occupy memory upto but not including location EBO4, The lower limit set for 
variable storage is the location @EFCO,. The start address of the last variable assigned is. 
stored in the pointer EFC2, 


In the next article I shall look at how commands, variables and data are stored in the 
Code Table and how the variable names are encoded. I will show how tables are updated 
and accessed in both Direct and Pragramme modes. 


To round off I have presented some Basic programmes for users to experiment with. 


POPS Chrd C0t BORe OEE CREE SEED GOED SHEE BH Es F008 CUED WERE COED CFET CECE SORT BEET TOTS 4D CUE rays SUES tore CUER SOT4 ~OTe VERE 4200 BIEN Fees oewe FEET ater send 2OEe cree Byes wren come ce an coe se carn coer ff 


OPEL COOP NEF 206e TERE FEED Bet FOBT OFER EFEE CFE YORE CREE SUED CFOS FEES evOe She CECD ENED 4G SETS HeED ewes + O0R arse erty ree 20 


Oe Can Caer Bree ewes Fran Sete Fane vee sere Coer 6503 none Base f4ED Ones ents 


|: 

| 
! Pointer @Fointer DESCRIFTION | 
| | 
| debi bc ce cad'ay. “0 tas Son Goat wind nen oko Seagpaibead ann saues okow’ alle laude, awe nen trek ane ‘even! enact bee auee ben ace sec! Yass als panies uses ‘ees sa QClasoa onge, goes aden pike goed sagseces pes | 
|< | 
| EDO4 re Start of Basic | 
| EFEA 7418 Start of Line Table | 
| EFRC 74464 Start of Yar. Names | 
| EFRE 7486 Start of Var. Addresses | 
| EF (CO FAAZ Memory Above basic, | 
| EF C2 EADC Last Variable Address. | 
| | 
| | 
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f... 


1 ene 


9000 
9020 
9030 
9300 
9310 
9340 
9550) 


a 
oe owe Plan 


9000 
9020 
9030 
9300 
9510 
P52 0 
953 (} 

ae ee 
sh 
PO 


SEE FOR YOURSELF ! 


The following listings will allow you to look at the contents of the BASIC CODE TABLE, 


Essentially they are BASIC programmes which look at themselves! Please use the same . 


line numbering as I have, the reason will become obvious soon, 


The first programme ’LIST1’ shows the encoded basic in the form of single bytes. This 
sort of programme is useful to look for tokens of keywords and variables. 


The second programme LIST?! shows the CODE TABLE as Ascii characters, This form is 
useful for looking at strings and REM statements, 7 


The above two codes show the lines listed, It would be more useful ta show only code upto 
line 9000, This will enable users to add lines below 9000 and show the encoded Basic 
without having to show the routine which displays the data, To understand how to do this 


it would be useful to look at the Line Number Table. The third programme LINES shows | 


- how Line Numbers are stored in the table. Note that the lines are stored in reverse order. 


With the knowledge of how to access line numbers it is possible to modify LIST! or LIST2. 
The final programme LISTS will only display encaded Basic upto line 2000, The programme 
looks for the value 9000 in the line number table sa now it is obvious why I wished the 
same line numbering to be used, It is also possible to modify LISTZ in the same way, 


I have not included outputs from the programmes as it is more useful to let poeple run the » 


programmes themselves, The programmes are very shart and do not involve much typing: 


“* r pean. 7 “ 
te cool ees “Heoeell! ables 


REM CODE TO SHOW BASTC ENCODING 


BASIC STOR 


a tego a P2=MWDOE OEFEBAHI-Z ' START & FINISH OF 
2 "SCESTART OF BASIC “f£,F1: 2 " END OF BASIC "“j£,F2 
REM xxx QUTFUT RESULTS *xx 
FOR D=F1 TO F223 Z=MEMEITI | Lee 
NEXT I 7 
ee 
REM CODE TO SHOW EBASTC ENCODING 
Fi=eMADIOEDO4HI? P2=MWDCOEFBAHI-2Z | START & FINISH OF EBASTIC STOR 
2? '"SC2START OF BASIC "“f£,Fit ? " END OF BASIC "f£,F2 
REM Xxx OUTFUT RESULTS Xxx 
FOR T=F1 TO FZ: Z=MEMCTI 
$Ce" ': TF Z LAND Pees $C=' 
YZ LAND 127: IF x<32! X=44 'Non Printable Characters Show wip 
(Tah + “x 
? $0 5 
NEXT TI 


[a- (0 


AGE 


AGE 


as a Dot 


@ “eCoLINE 


NUMBER 
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100 TABLE DISFLAY"! YU ee ae nn nee ne sn ee ne aan em tne ee mana ED 
900 ? "LINE NUMBER OFFSET (HEX) (DECIMAL) " | 
910 TU nn ase cece tote nen snes anes cone come sear cote eet coer anes oust tps none weld eres yore eens enet cout poe eens Le 
1000 ST=MNDCOEFBAHI]! FI= MDC OEFECHI— 

1010 FOR I#ST TO FI STEF 4 

1020 © 2? MWDOCII,,£, NHDCI+Z2, ,MWDCI+22 

1030 NEXT IT | ae 
3000 REM THIS LINE NUMBER TS THE FIRST DISPLAYED 

Le 
9000 REM CODE. TO SHOW BASIC ENCODING 
9929 Fi=MWDCOEDO4H]! F2=MWDCOEFBAHI-Z | START & FINIS H OF BASIC STORAGE 
9030 ? "“Q2START OF BASIC "3£,F13 2? " END OF Basle "SES F2 
9040 LNO=90003 P3=MNDCOEFBCHI-2 : 

9050 FOR L=F3 TO F2+2 STEP -4 

9060 IF MWOCTIJ=LNO? GOTO 9100 

9070 NEXT I. 

9080 ? "NO LINE 9000 IN THIS PROGRAMME! " 

9090 END | 

9100 P21 +MWDLI+2 1-2 | RESETS F2 TO END OF LINE BEFORE 7000 

9500 REM xxx OUTPUT RESULTS «xx 
9510 FOR T#Fi TO F2% Z=MEMECTI 
9540 2? £973" “P| 
9550 NEXT I 


MSAVE &: MLOAD COMMANDS 

Have you ever wanted to merge programmes or get rid of ‘phantom Variables’ (See Newsletter 10) 
without having to Source List programmes to tape? I have written two commands MSAVE and 
MLOAD which save source listings in high memory. c. = 


In case anyone does not know what is meant by a source listing, it is a way of storing a 
programme as character data in the form of ASCII codes, Normally a programme is stored to disk 
or tape as a memory dump of the highly encoded BASIC and line number and variable tables. The 
advantage of a source saving is that on retreival any BASIC programme in memory is NOT wiped © 
out hence allowing merging of routines. Also no variable attributes are stored. Retrelving a. 
source listing is like ‘retyping’ in all the lines only much faster and with less effort. The 
disadvantage with source listings is that much more memory or tape/disk storage is taken up. 


Programme Description 


The machine code programme UTILS (short for utilities) consists of routines for three commands 
FIND,MSAVE,MLOAD. The MSAVE command uses the same type of routines as the FIND command 
in newsletter 3 which I have modified slightly to save on memory when combined with MSAVEs« The 
enclosed listing with added comments shows how the routines work. The choice of bufter locations 
is entirely up to the user, I tend to use 70A0H as a general buffer for CAT,PIND,Return vector 
storage etc. The buffer for MSAVE should be large in order to store sensible sized chunks of 
BASIC source lines, which is why I chose F200H to FEOOH (the last BASIC line stored will exceed 
this value). The only reason I have not extended the buffer to FFxx is that I have a problem with. 
randam numbers occuring in locations FEFA to FEFE. Has anyone any ideas about this? Users who 
have an EBUS extended memory which I do not, will obviously be able to use quite large storage 
buffers! | | - 


The commands are patched into the Command tables at 3A20,3A22 and 3A24H. The commands 
cannot be used from within a BASIC programme but only in direct mode, Only the first 3 
characters of the commands need to be typed eg MSA will dump the current BASIC programme to 
memory. This section of the programm intrudes into the beginning of CDOS. This does not provide 
any problems as this part of CDOS appears only to be used once at BOOT time! 


The first two wards in the storage buffer are used as pointers which MSAVE & MLOAD use when 
transfering data between the store and the BASIC environment, 


There are branches to two operating sytem routines. The routine at 3CS0H is the routine that 
converts a programme line to ASCII format for display, used by LIST and the line editor. The 
routine at 3404H converts lines in ASCII format into a programme line, whilst performing syntax 
checks. This routine is used by ENTER and the line editor. 


It will be noticed that there are two ways to display basic lines, One is using the MID CODE 
0002, the ather is by using MSG @>EBO4, The MID CODE looks for a line number at the start of 
the buffer at EBO4 and if found the appropriate BASIC line printed. The MSG simply prints the 
whole contents of the buffer at ERO4, The latter is used in the MLOAD programme as the line in 
the:BASIC table may not exist or be different to that being recalled from high memory. For 
- example if MLOADing a programme after a NEW command has been used, then the MID would only © 

display line numbers whereas the MSG will display the full line being retrieved. | 


fon 
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USING THE COMMANDS 

The FIND is used exactly the same as that in newsletter III. 

eq, FIND textstring 

The space is important and the word FIND must be at the beginning of a line. 


MSAVE and MLOAD use no parameters and can be typed anywhere on a line, The two uses are 
MERGING codes or SOURCE LOADING to get rid of phantom variables, - 


MERGING. MSAVE the routine to be merged. If this is part of anather code then delete unwanted 
lines and renumber as appropriate. An **# END OF BUFFER WARNING ## is given if the code is 
larger than the buffer. In this case use the Monitor to dump the buffer to disk as a non 
executable m/c programme, Delete the programme lines that have been saved and repeat the 
process. The last MSAVE does not need to be transfered to disk! Load the main programme as 
normal. Use MLOAD to merge the new code, MLOAD will replace existing<line numbers - be 


careful with your numbering, If the buffer is stored on disk LOAD ‘Filename’ - You do not need to 


use the monitor and then MLOAD, The code required will now be merged. 


DELETING PHANTOM VARIABLES. Firstly MSAVE the basic programme. Most programmes will 
have to be done in several stages saving the buffer to disk using the monitor, When all the code 
has been saved type NEW. MLOAD the code back into BASIC, retreiving files from disk if 
necessary, On completion you will have a copy of the original code but with vacant variable space, 


MSAVE will display the basic lines as they are stored, If the end of buffer is reached the last 
line stored will be that above the error message, MLOAD displays the basic lines as they are 
retreived: | 


To save the buffered ascii code onto disk use the monitor D command starting at FZ00H, The data 


finishes at the pointer stored in FZ0ZH, however if in doubt storing memory upto FESOH should 
contain all the data required, | 


(4.1% 


_ Name ADDR CODE 


FIND  6@1@ 0200 
6014 0201 
6018 DC72 
6O1A 16FE 
6@1C 0002 
G@1E @6AQ 
6022 O6A0 
6026 0202 
GO2A 0201 
GOZE 0494 

6030 13F8 
6@32 9C91 
6034 16FC 

6036 0581 
GQ@38 0451 
6@3A 1303 
G6@3C. 9C91 
6Q3E 16F5 


6040 10FA 


6042 0002 
6044 004A 
6046 10ED 


MSAVE 6048 02023 
6O4C C83 
6950 C803 
6054 @6A0 
6058 Q6A0 
BQ5C BOEO 
6068 0201 
6054 DCF 
6066 16FE 
6068 0002 
606A 000A 
BQ6C C803 
6070 283 
6074 11F1 
6076 0002 
6078 @FAQ 


EXIT 6@7C 8082 
6B@7E @460 


MLOAD 6082 4201 
6086 CEO 
6@8A ODC73 
6@8C I16FE 
6@8E C803 
60952 @O6A0 
6096 00@2 
6@98 @FAQ 
56@9C 8820 
B@AZ IL1EF 
60A4 0201 


UTILS 


INSTR INSTRUCTIONS COMMENTS 

LI RO, >EBOI Editor Buffer +5 

LI R1,>7@AQ Storage buffer 

MOVB *RO+,*#Rit Store byte 

JNE »>6018 Next byte 

DATA >Q@002 MID OPCODE —- empty line 
BL @>6@AE Start Routine | 
BL >6OC8 Decode Routine | 
LI R2,>EBO4 Buffer - decoded line 
LI R1,>7QA8 Storage buffer 

MOVB #R2,#R2 Check end of line 

JEQ >BO22 Jump if at end 

CB *R1,*#R2+ match? 

JNE »6@O2ZE No - try again 

INC Rl | 

MOVB #R1,#R1 Test of Search string 
JEG “> 6O42 End found 

CB *R1i,#R2t match? 

JNE »>bO2ZA Try again for match 
JMP 26036 Next char in search string 
DATA >@002 — Print empty line 

DATA >@QGA Print BASIC iine . 

JMP >b022 Next BASIC line 

Lol R3,>F204 Start of Storage Space 
MOV R3,@7F200 Pointer to Start 

MOV R35 ,@>F202 Pointer to End 

BL @>B@AE Start Routine 

BL —@>60C8 Decode Routine 

MOV @>F 202 ,R3 End Pointer in RS 

LI R1,>EBO4 Buffer - decoded line 
MOVB *R1l+,#*#R3t+ Put character into store 
JNE 76064 Next character 

DATA >O0002 MID - print empty line 
DATA >OQ@A . MID - print BASIC line 
MOV R3,@>F 202 Update ‘pointer 

Cl R3,>FE@O Check Storage Space 
JF >6@58 OK 

DATA 20002 Print empty line 

MSG @>G6@EA BUFFER FULL MESSAGE 
DATA 20002 Print empty line 

B @>O21C Back to BASIC 

LI R1,>EBO4 Editor buffer 

MOV @>F20@,R3 Start pointer in R3 
MOVB *#R3+,*#Ri+ Move char to KB buffer 
JNE >B@8A Next character 

MOV R3,@>F200 Update pointer 

BL @>3404 Enter BASIC line 

DATA >@082 Print empty line 

MSG @>EBO4 Display BASIC line 

C @>F2Z0Q0,@>F202 End of Stored Data’ 
JLT >6082 No - Get Next Line 

LI Ri,7F204 Reset Start pointer 


(AMG 


START 


DECODE 


B@AS 
BQAC 


BQ@AE 
BOBO 
B@B2 
690B6 
60B8 
6@BC 
6QBE 
60C2 


— 60C4 


6@C6 


6@C8 
6@CC 
6@D@ 


6QD2 


6@D4 
6@D6 
60D8 
6@DC 


6QEQ 
BOE4 
“BOEG 


MESSAGE 6QE8 
C 5 60EA 


NAMES 


SADDRESS 


SETUP 


EXIT2 


SAVING 


BEC 
6QEE 
60FO 
60F2 
6OF4 
6QF6 
6QF8 
BOFA 
BQFC 
6QFE 


6100 
6102 
6104 
6106 
6108 
610A 


61@C 
6110 
6114 
6118 
GL1C 
B11E 
6120 
6124 
6126 
612A 


----> 


eee ore ee oe 


Ri, @>F200 
>607C 


Ri 
R6 
@>EFBC ,R8 


RB | 
R8,@>EFBA 


>B@7C 
R8,>FFFC 
R1,#*R8 
>6@B8 


R11,@760E8 


R8,@>EFBA 
>6@7C 
*R8+,R1 
Ri,R6 
>607C 
@>3C80 
R8,>FFEFA 
@®6@E8,R1i1t 


>6QSC 
>2A2A 
>2045 
>BEG4 
>2Q6F 
>6620 


_ 24275 


>B666 
>6572 
>202A 
>2A20 
+0002 


27T24C 
»@CDA 
>TBILA 
>601@ 
>6048 
>6082 


R1,>3A20 
R2,>3ACC 
R3,>6100 
R4,>6106 


ARS ARTF 
*RA+,#R2+. 


R1,>4A28 
>BLIC 
@7@21C 


D IDT="UTILS" 


[4-(S 


oT tt “ 


Exit 


Ril Holds ist Line No 


Start of Variable Table 
End of Line No Table 
Start of Line No Table 
Exit oe 

R8=R8-4 : 
Compare table to start line 
Repeat until Line No found 
Return 


Store Return Vector 

Check end of table 

If YES then Exit 

Get Offset in BASIC Table 
Is it Valid 

No then Exit. | 
Decode BASIC ta ASCII 
R8=R8-6 ~ 

Get Return Vector 

Return 


End of Buffer 
Message 


Name "FIND’ _ 
Name "MSAVE'. 
Name ’*MLOAD’ 

St. address FIND 
St. address MLOAD 
St. address MSAVE 


Entry adress for Autorun 
IS 610CH | 


Patch Names into Table 
Patch addr. into Table 
All done ? 

No - Next 

Back to BASIC 


- 


6@10,612B,610C Autorun=Y 


Cortex User Group Sale Items 


L4-16 


Hardware 

R.G.B. interface P.C.B £8.00 
Centronics P.C.8 | | £7.00 
E.Bus 512K DRAM P.C.B plated through hole £40.00 
Externel Video interface P.C.B oe £15.00 
Disk controller WO2797 + P.C.B Cortex ! £55.00 
Disk controller WDO2797 + P.C.B Cortex Il £60.00 
E.Bus interface complete Kit £30.00 
E.Bus 8 X 8K EPROM socket card built but no EPROMS £30.00 
E.Bus 4K RAM 8K EPROM socket 16 I/0 lines ex equipment £15.00 
TMS9902 UART IC‘s £2.00 
74LS612 Mapper IC’s | £25.00 
74.5611 or 74LS613 Mapper IC’s (req pull up R‘s) £10.00 
Other IC’s in stock please write in for quote 

Software all disk formats please specify when ordering 

CDOS basic disk system 1.20 for 1MS9909 £45.00 
CDOS basic disk system 2.00 for WD2797 £45.00 
Wortex word processor + spelling check by J.Makenzie £15.00 
Drawtech graphics drawing package by Tim Gray £20.00 
Menue generator by A.R.C.Badcock £10.00 
Two pass assembler by R.M.Lee £14.00 
Two pass asembler by C.J.Young £15.00 
Cdos utilites disk - copy charge only £2.00 
Cdos programes and games all £2.50 each t- 

ARCHIE ASTEROID BREAKOUT BURGLAR CATERPIL C-PEDE 
CANYON COTELLO FIREBIRD FROGGER GDESIGN GOLF 
HUNCHBACK INVADERS MAZE MAZE-3D MBASE MICROPED 
MIS-COM MUNCHER NIBBLERS N-ATTACK OLYMPICS P.BOAT 
PENGO PONTOON RESCUE S-ATTACK SPACE~BU THE-ZOO 
TRAG VADERS WALL X/0 7 

MDEX Software all formats please specify 

MDEX CORE with debug monitor text editor and basic £10.00 
MDEX ASM & LINK assembler and linker | £10.00 
MDEX SYSGEN system generation kit £10.00 
MDEX WORD word processor | £10.00 
MDEX P.D.S. all the above in one package £30.00 
MDEX S.P.L. system programming language £10.00 
MDEX META compiler generator £10.00 
MDEX QBASIC basic compiler £15.00 
MDEX PASCAL sequential pascal £10.00 
MDEX WINDOW full screen editor £15.00 
MDEX SPELL spelling checker — ; £10.00 
MDEX utilities copy charge only £2.00 


